home *** CD-ROM | disk | FTP | other *** search
/ El Mac 9 / El Mac 9.iso / Shareware / Applications / Charting Coach v1.5 / Charting Coach v1.dxr / 00077.ls < prev    next >
Encoding:
Text File  |  1996-04-08  |  672 b   |  30 lines
  1. on mouseUp
  2.   global previewOnly
  3.   if the doubleClick then
  4.     exit
  5.   end if
  6.   if not objectp(printer) then
  7.     cursor(0)
  8.     alert("There is no currently selected printer. Printing features are disabled.")
  9.   else
  10.     set previewOnly to 1
  11.     if the hilite of member "printbioData" then
  12.       if count(bioInfo) > 0 then
  13.         printBioData()
  14.       else
  15.         cursor(0)
  16.         alert("Biographical data for this cycle has not yet been entered.")
  17.       end if
  18.     else
  19.       if objectp(printer) then
  20.         mainPrintOrder()
  21.         cursor(0)
  22.         printer(mPrintPreview)
  23.       else
  24.         alert("No printer selected.")
  25.       end if
  26.     end if
  27.   end if
  28.   cursor(0)
  29. end
  30.